home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / tex / td187src.lzh / CIRCLES.D < prev    next >
Text File  |  1991-12-14  |  421b  |  25 lines
  1. DEFINITION MODULE Circles ;
  2.  
  3. FROM Types IMPORT ObjectPtrTyp ;
  4.  
  5. PROCEDURE Ellipse (FillFlag : INTEGER);
  6. (* =0 nicht füllen *)
  7.  
  8. PROCEDURE Circle ( ) ;
  9.  
  10. PROCEDURE Arc ( );
  11.  
  12. PROCEDURE EllArc ( );
  13.  
  14. PROCEDURE Disk (FillFlag : INTEGER);
  15. (* =0 nicht füllen *)
  16.  
  17. PROCEDURE Show ( Object : ObjectPtrTyp ) ;
  18.  
  19.  
  20. PROCEDURE Change ( Object : ObjectPtrTyp;
  21.                    DX, DY : LONGREAL ) ;
  22.  
  23.  
  24. END Circles .
  25.